Vyhledavani v listview ? JAK ?

Otázka od: Jiri Betunak

16. 9. 2002 20:00

Zdravim
Potrebuji vyhledavat zaznam v Listviw - u
asi takto mam napr. 5 sloupcu a potrebuji hledat jen v jednom
podle toho ktery si zvoli uzivatel NEVI prosim nekdo jak na to?

Predem diky za jakou koliv radu

Jiri Betunak
Kindrik@centrum.cz
Viruslog@volny.cz

Odpovedá: Ing. Pavel Žilinec

17. 9. 2002 17:11

Asi si to budes muset projit ruzne.
Z hlavy napr.:

function NajdiRadek(ASloupec : integer; AText : string) : integer;
var
  i : integer;
  MyText : string;
begin
  Result := -1;
  for i := 0 to ListView.Items.Count - 1 do
  begin
    if ASloupec = 0 then MyText := ListView.Items[i].Caption
    else MyText := ListView.Items[i].SubItems[ASloupec - 1];
    if MyText <> AText then continue; {To porovnani samozrejme muze byt
libovolne}
    Result := i;
    exit;
  end;
end;

--------
ing. Pavel Zilinec
MailTo:zilinec@email.cz

Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju

JB> Zdravim
JB> Potrebuji vyhledavat zaznam v Listviw - u
JB> asi takto mam napr. 5 sloupcu a potrebuji hledat jen v jednom
JB> podle toho ktery si zvoli uzivatel NEVI prosim nekdo jak na to?

JB> Predem diky za jakou koliv radu

JB> Jiri Betunak
JB> Kindrik@centrum.cz
JB> Viruslog@volny.cz

Odpovedá: Petr Vones

17. 9. 2002 17:26

From: "Ing. Pavel Žilinec" <zilinec@email.cz>
> function NajdiRadek(ASloupec : integer; AText : string) : integer;

function NajdiRadek(ASloupec : integer; const AText : string) : integer;

Petr Vones